
use "A1_Winters-Claims.dta", clear



**** Appendix Figure A1: Winters claims relative to ID rights, by settlement
********************************************************************************
********************************************************************************

colorpalette #fafa6e #2a4858, ipolate(30, HCL) nograph
graph twoway (bar rel_claims settlement if settlement==1 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==1 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==2 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==2 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==3 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==3 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==4 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==4 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==5 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==5 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==6 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==6 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==7 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==7 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==8 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==8 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==9 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==9 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==10 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==10 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==11 & winters == 0, barwidth(.95) bcolor("`r(p30)'%40") blwidth(zero) lcolor(none)) ///
(bar rel_claims settlement if settlement==11 & winters == 1, barwidth(.95) bcolor("`r(p30)'") blwidth(zero) lcolor(none)) ///
(scatter rel_claims settlement, mlabel(label) mlabpos(12) mlabsize(medlarge) mlabcolor(black) msymbol(none)) ///
, ylab(0(50)250, notick labsize(medlarge)) xlab(1 "WMAT" 2 `""Fort" "McDowell""' 3 "GRIC" 4 `""Nez" "Perce""' 5 `""Paiute" "(UT)""' 6 `""Salt" "River""' 7 `""San" "Carlos""' 8 `""San Luis" "Rey""' 9 "Ute" 10 `""Yavapai" "Prescott""' 11 `""Zuni" "(AZ)""', notick labsize(medium)) ytitle("Tribal Claims as Percentage" "of ID Pre-Settlement Claims", size(large)) xtitle(, size(zero)) yline(100) xsize(20) ysize(8) legend(pos(6) col(3) label(1 "Irrigation District") label(2 "Tribal Claim") order(1 2 ) size(large)) graphregion(margin(tiny))
